home *** CD-ROM | disk | FTP | other *** search
- nWindowID = 0
-
- function LuaInit( ... )
- OutputValue( "LuaInit called()", arg[1] )
- nWindowID = arg[1]
- end
-
- function LuaProcessMessage( nMessageCode, nFirst, nSecond )
- if ( nMessageCode == 10002 ) then
- AddMessage( 65537, 10001, 1 ) --IMC_CANCEL
- return 1
- end
-
- if ( nMessageCode >= 10001 and nMessageCode <= 10005 ) then
- AddMessage( 65537, nMessageCode, 1 ) --NEXT_STATE
- return 1
- end
-
- if ( nMessageCode == 536936448 and ( nFirst >= 10001 and nFirst <= 10005 ) ) then
- local nMessage = SetProcessedFlag( nFirst )
- AddMessage( nMessage, 0, 1 )
- return 1
- end
-
- if ( nMessageCode == 536936448 and ( nFirst >= 1000 and nFirst <= 1010 ) ) then
- local nMessage = SetProcessedFlag( nFirst )
- AddMessage( nMessage, 0, 1 )
- return 1
- end
-
- if ( nMessageCode == 536936451 or nMessageCode == 536936452 ) then
- --forward these messages to the game
- local nMessage = SetProcessedFlag( nMessageCode )
- AddMessage( nMessage, nFirst, nSecond )
- return 1
- end
-
- if ( nMessageCode == 268435457 ) then
- OutputValue( "268435457 message, nFirst = ", nFirst )
- if ( nFirst >= 20000 and nFirst < 29000 ) then
- local nMessage = SetProcessedFlag( nFirst )
- AddMessage( nMessage, nWindowID, 1 )
- return 1
- end
- end
-
- return 0
- end
-